﻿Imports DTO
Imports DAO

Public Class LuongBUS
    Dim LDAO As New DAO.LuongDAO()
    Public Function TinhLuong(ByVal m As Integer, ByVal y As Integer)
        Return LDAO.TinhLuong(m, y)
    End Function
    Public Sub UngTien(ByVal manv As String)
        LDAO.UngTien(manv)
    End Sub
    Public Sub TraTien(ByVal m As Integer, ByVal y As Integer)
        LDAO.TraTien(m, y)
    End Sub
End Class
